[LegacyColorValue = true]; 

{ TSM Smoothed Force : Smoothed Force Index
  Copyright 1999, P.J.Kaufman. All rights reserved.

	Input length = 5 produces a smoothing constant of .333 }

	inputs:  length(5);

	plot1(TSMSmoothedForce(close,length),"TSMSmForce");